微信聊天记录报告

1. 分析环境配置

1.1 加载分析使用的包

libs <- c("plotly", "data.table", "lubridate", "dplyr", "stringr", "tidyr")
for (i in libs){
  if( !is.element(i, .packages(all.available = TRUE)) ) {
    install.packages(i)
  }
  library(i,character.only = TRUE)
}

sessionInfo()

## R version 3.3.3 (2017-03-06)
## Platform: x86_64-w64-mingw32/x64 (64-bit)
## Running under: Windows 10 x64 (build 15063)
## 
## locale:
## [1] LC_COLLATE=Chinese (Simplified)_China.936 
## [2] LC_CTYPE=Chinese (Simplified)_China.936   
## [3] LC_MONETARY=Chinese (Simplified)_China.936
## [4] LC_NUMERIC=C                              
## [5] LC_TIME=Chinese (Simplified)_China.936    
## 
## attached base packages:
## [1] stats     graphics  grDevices utils     datasets  methods   base     
## 
## other attached packages:
## [1] tidyr_0.7.1        stringr_1.2.0      dplyr_0.7.4       
## [4] lubridate_1.6.0    data.table_1.10.4  plotly_4.7.1.9000 
## [7] ggplot2_2.2.1.9000
## 
## loaded via a namespace (and not attached):
##  [1] Rcpp_0.12.13      bindr_0.1         knitr_1.17       
##  [4] magrittr_1.5      munsell_0.4.3     viridisLite_0.2.0
##  [7] colorspace_1.3-2  R6_2.2.2          rlang_0.1.2      
## [10] httr_1.3.1        plyr_1.8.4        tools_3.3.3      
## [13] grid_3.3.3        gtable_0.2.0      htmltools_0.3.6  
## [16] assertthat_0.2.0  yaml_2.1.14       lazyeval_0.2.0   
## [19] rprojroot_1.2     digest_0.6.12     tibble_1.3.4     
## [22] bindrcpp_0.2      purrr_0.2.3       htmlwidgets_0.9  
## [25] glue_1.1.1        evaluate_0.10     rmarkdown_1.6    
## [28] stringi_1.1.5     scales_0.5.0.9000 backports_1.1.0  
## [31] jsonlite_1.5      pkgconfig_2.0.1

1.2 导入聊天记录并进行数据整形

最早的10条信息：

最近的10条信息：

2. 消息总览

2.1 不同类型的消息收发总览

2.2 消息条数热图

◢ 周末

2.3 消息发送频率（总体）

2.4 每月消息分布

2.5 消息类型分布

3. 文字消息分析

3.1 文字消息长度分布

接收的最长的一条消息有357字

发送的最长的一条消息有250字

3.2 系统默认表情

4. 自定义表情分析

4.1 接收

共接收自定义表情信息2732条，其中非重复的表情一共有275个，接收的最多的一个表情163次。
表情包发送数目的前5位如下：

第 1 位: 163 次

第 2 位: 131 次

第 3 位: 114 次

第 4 位: 111 次

第 5 位: 106 次

4.2 发送

共发送自定义表情信息1659条，其中非重复的表情一共有117个，接收的最多的一个表情182次。